ifnor(a,b,c,d)
	if not ( not ( (not a>0) and (not b>0) and (not c>0) and (not d>0)) ) goto true;
	goto false;
	return -1;
	false: return 0;
	true: return 1;
end;
